home *** CD-ROM | disk | FTP | other *** search
/ Mastering Public Speaking / Mastering Public Speaking.iso / pc / Click Here.exe / Click Here.dxr / Internal_42_New File Button.ls < prev    next >
Encoding:
Text File  |  2003-05-13  |  330 b   |  13 lines
  1. global varGoingTo, varFilePath
  2.  
  3. on mouseDown
  4.   fileIOobject = new(xtra("fileIO"))
  5.   filePath = fileIOobject.displaySave("Save As", "YourName.doc")
  6.   fileIOobject.createFile(filePath)
  7.   varFilePath = filePath
  8.   fileIOobject.openFile(filePath, 0)
  9.   fileIOobject.closeFile()
  10.   fileIOobject = VOID
  11.   go(label(string(varGoingTo)))
  12. end
  13.